home *** CD-ROM | disk | FTP | other *** search
/ What PC? 1996 August / WPCAUG96.ISO / refwaug.dxr / 00020_REFReplaceLinesButtons .ls < prev    next >
Encoding:
Text File  |  1996-06-14  |  398 b   |  11 lines

  1. on REFReplaceLinesButtons
  2.   global IFLButtonList, IFLReferenceNameSprite, REFMasterList, REFLastActive
  3.   repeat with f = 1 to count(IFLButtonList)
  4.     set ThisTempList to getAt(IFLButtonList, f)
  5.     if getAt(ThisTempList, 1) <> IFLReferenceNameSprite then
  6.       set the locH of sprite getAt(ThisTempList, 1) to getAt(ThisTempList, 3)
  7.     end if
  8.   end repeat
  9.   set the castNum of sprite 3 to 55
  10. end
  11.